// ==================================================================================
// Shared Genomics Project MPI Codebase
// Version 1.0 30/04/2010
//
// (c) 2010 University of Manchester all rights reserved
//
// This file is distributed under the GNU General Public License, Version 2.  
// Please see the file COPYING.txt for more details
// ==================================================================================

/*! 
\file 
\brief Implementation of MPI Error Functions
*/

#include <stdio.h>
#include "mpi_error.h"

void mpi_error(int error_code, char *message) {
	if (message != NULL) {
		fprintf(stderr, "MPI Failed: code=%i, %s\n", error_code, message);
	}

	MPI_Abort(MPI_COMM_WORLD, 0);
}